home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 October / Chip_2004-10_cd1.bin / software / code / setup.exe / Syntax Definitions / oberon.def < prev    next >
Encoding:
Text File  |  2001-11-01  |  3.1 KB  |  127 lines
  1. object TPersHolder
  2.   P.Name = 'Oberon'
  3.   P.SyntaxBlocks = <
  4.     item
  5.       Name = 'Default'
  6.       ID = 0
  7.       CaseSensitive = True
  8.       FIText = 0
  9.       FIIntNum = 3
  10.       FIFloatNum = 4
  11.       FIHexNum = 5
  12.       FISymbol = 7
  13.       UseSymbols = True
  14.       UseComments = True
  15.       UseMultiLineComments = True
  16.       UseStrings = True
  17.       UseSingleLineStrings = True
  18.       UseNumbers = True
  19.       UseSuffixedNumbers = True
  20.       UseMultipleNumSuffixes = False
  21.       UseKeywords = True
  22.       BlockDelimiters = <>
  23.       MultiLineCommentDelimiters = <
  24.         item
  25.           FontID = 1
  26.           LeftDelimiter = '(*'
  27.           RightDelimiter = '*)'
  28.         end>
  29.       SingleLineStringDelimiters = <
  30.         item
  31.           FontID = 2
  32.           LeftDelimiter = '"'
  33.           RightDelimiter = '"'
  34.         end>
  35.       NumSuffixes = <
  36.         item
  37.           LeftDelimiter = 'H'
  38.         end
  39.         item
  40.           LeftDelimiter = 'X'
  41.         end>
  42.       KeywordSets = <
  43.         item
  44.           FontID = 6
  45.           Name = 'reserved'
  46.           Keywords = 
  47.             'ARRAY,BEGIN,CASE,CONST,DIV,DO,ELSE,ELSIF,END,EXIT,IF,IMPORT,IN,I' +
  48.             'S,LOOP,MOD,MODULE,NIL,OF,OR,POINTER,PROCEDURE,RECORD,REPEAT,RETU' +
  49.             'RN,THEN,TO,TYPE,UNTIL,VAR,WHILE,WITH'
  50.         end>
  51.     end>
  52.   P.FontTable = <
  53.     item
  54.       FontID = 0
  55.       GlobalAttrID = 'Whitespace'
  56.       Font.Charset = DEFAULT_CHARSET
  57.       Font.Color = clBlack
  58.       Font.Height = -13
  59.       Font.Name = 'Courier New'
  60.       Font.Style = []
  61.     end
  62.     item
  63.       FontID = 1
  64.       GlobalAttrID = 'Comment'
  65.       Font.Charset = DEFAULT_CHARSET
  66.       Font.Color = clGray
  67.       Font.Height = -13
  68.       Font.Name = 'Courier New'
  69.       Font.Style = [fsItalic]
  70.     end
  71.     item
  72.       FontID = 2
  73.       GlobalAttrID = 'String'
  74.       Font.Charset = DEFAULT_CHARSET
  75.       Font.Color = clMaroon
  76.       Font.Height = -13
  77.       Font.Name = 'Courier New'
  78.       Font.Style = []
  79.     end
  80.     item
  81.       FontID = 3
  82.       GlobalAttrID = 'Integer'
  83.       Font.Charset = DEFAULT_CHARSET
  84.       Font.Color = clGreen
  85.       Font.Height = -13
  86.       Font.Name = 'Courier New'
  87.       Font.Style = []
  88.     end
  89.     item
  90.       FontID = 4
  91.       GlobalAttrID = 'Float'
  92.       Font.Charset = DEFAULT_CHARSET
  93.       Font.Color = clGreen
  94.       Font.Height = -13
  95.       Font.Name = 'Courier New'
  96.       Font.Style = []
  97.     end
  98.     item
  99.       FontID = 5
  100.       GlobalAttrID = 'Integer'
  101.       Font.Charset = DEFAULT_CHARSET
  102.       Font.Color = clGreen
  103.       Font.Height = -13
  104.       Font.Name = 'Courier New'
  105.       Font.Style = []
  106.     end
  107.     item
  108.       FontID = 6
  109.       GlobalAttrID = 'Reserved words'
  110.       Font.Charset = DEFAULT_CHARSET
  111.       Font.Color = clBlue
  112.       Font.Height = -13
  113.       Font.Name = 'Courier New'
  114.       Font.Style = [fsBold]
  115.     end
  116.     item
  117.       FontID = 7
  118.       GlobalAttrID = 'Delimiters'
  119.       Font.Charset = DEFAULT_CHARSET
  120.       Font.Color = clBlack
  121.       Font.Height = -13
  122.       Font.Name = 'Courier New'
  123.       Font.Style = []
  124.     end>
  125.   P.SyntaxVersion = 3
  126. end
  127.